home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Ultimate Frank Lloyd…ght - America's Architect
/
Ultimate Frank Lloyd Wright, The - America's Architect (1994)(Microsoft Home).iso
/
pre
/
flw
/
flwdee.dir
/
00432_Script_432
< prev
next >
Wrap
Text File
|
1994-11-15
|
3KB
|
131 lines
on startMovie
global nowFrame
global horNess, currMM
global dialogOn
set dialogOn = FALSE
set currMM = "FLWWW"
puppetSprite 21, TRUE
puppetSprite 22, TRUE
puppetSprite 23, TRUE
set the immediate of sprite 23 to TRUE
set the stretch of sprite 23 to FALSE
puppetSprite 6, TRUE
repeat with i = 12 to 16
puppetSprite i, TRUE
end repeat
end startMovie
on stepMovie
global nowFrame,currFrame
if nowFrame <> currFrame then
seeAlsoList
set currFrame = nowFrame
end if
end stepMovie
on stopMovie
set the castNum of sprite 21 to 1050
puppetSprite 21, FALSE
put " " into field "SeeAlsoText"
updateStage
end stopMovie
on saveLocals
global lastFrame, nowFrame, lastMovie
set lastFrame = nowFrame
set lastMovie = "FLWDEE"
end saveLocals
on buttonState
global FrankNav, dialogOn
global bflag, noTx
if dialogOn = FALSE then
sectionCheck
-- don't check global buttons unless mouse is down at bottom
if (the mouseV > 200) or (bFlag = TRUE) then
doState
set bFlag = FALSE
end if
else if dialogOn = TRUE then
if the mouseDown then
if the mouseCast <> the number of cast "glossDialog" then
beep
end if
end if
end if
end buttonState
on deBackStep
global nowFrame
puppetSprite 6, FALSE
if nowFrame = "de000sto001°°°" then
go to "de000sta074°°°" of movie "FLWDES"
else
go to (the frame - 1)
end if
end deBackStep
on deForStep
global nowFrame
puppetSprite 6, FALSE
if nowFrame = "de000sto021°°°" then
go to "de000acc001°°°" of movie "FLWDEA"
else
go to (the frame + 1)
end if
end deForStep
on sectionCheck
global lastSprite, nowFrame, dialogOn
if dialogOn = FALSE then
if rollover(12) then
set the castNum of sprite 12 to 20
else
set the castNum of sprite 12 to 8
end if
if rollover(13) then
set the castNum of sprite 13 to 21
else
set the castNum of sprite 13 to 9
end if
if rollover(14) then
set the castNum of sprite 14 to 17
else
set the castNum of sprite 14 to 5
end if
if rollover(15) then
set the castNum of sprite 15 to 18
else
set the castNum of sprite 15 to 6
end if
end if
end sectionCheck
on textRoll txHt
global origLocV, topHat, dialogOn, SeeAlsoBox
if dialogOn = FALSE and SeeAlsoBox = FALSE then
set topHat = txHt + (the height of sprite 6 / 2)
if the width of sprite 6 > 300 then
if the mouseH > 229 and the mouseV > 363 and the mouseV < 431 then
set the locV of sprite 6 to topHat
else if (the mouseH > 610) or (the mouseH < 229) or (the mouseV > 431) or (the mouseV < txHt) then
set the locV of sprite 6 to 485
end if
else
if the mouseH > 414 and the mouseV > 363 and the mouseV < 431 then
set the locV of sprite 6 to topHat
else if the mouseH > 610 or the mouseH < 414 or the mouseV > 431 or the mouseV < txHt then
set the locV of sprite 6 to 549
end if
end if
end if
end textRoll